﻿
Public Class Karte

    Dim _id As Integer
    Public Property ID As Integer
        Get
            Return _id
        End Get
        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property Wert As Integer
    Public Property pic As String
End Class
